Sub OnStartup
    'ProgID is the full class name (including namespace)
    ind = SDB.UI.AddOptionSheet( "MM VoiceComm Config", Script.ScriptPath, "InitSheetOptions", "SaveSheetOptions", 0)
    SDB.UI.AddOptionSheet "MM VoiceComm Commands", Script.ScriptPath, "InitSheetCommands", "SaveSheetCommands", ind
	
    Set o = CreateObject("MMVoiceComm.MMStart")
    o.Init(SDB)
End Sub

Sub InitSheetOptions(Sheet)
    Set o = CreateObject("MMVoiceComm.MMOptionEventClass")
    o.InitSheetOptions(Sheet)
End Sub

Sub SaveSheetOptions(Sheet)
    Set o = CreateObject("MMVoiceComm.MMOptionEventClass")
    o.SaveSheetOptions(Sheet)
End Sub

Sub InitSheetCommands(Sheet)
    Set o = CreateObject("MMVoiceComm.MMOptionEventClass")
    o.InitSheetCommands(Sheet)
End Sub

Sub SaveSheetCommands(Sheet)
    Set o = CreateObject("MMVoiceComm.MMOptionEventClass")
    o.SaveSheetCommands(Sheet)
End Sub